home *** CD-ROM | disk | FTP | other *** search
/ BCI NET 2 / BCI NET 2.iso / archives / applications / databases / pdbase10a.lha / PDBase / Install < prev    next >
Encoding:
Text File  |  1994-12-27  |  1.1 KB  |  40 lines
  1.  
  2. ; Ask for destination
  3.  
  4. (set @default-dest   (askdir  (prompt "Select destination")
  5.                               (default @default-dest)
  6.                               (help (cat "Select the directory PDBase will be copied to.\n"
  7.                                           "Note: a sub-directory will be created.\n\n"
  8.                                           @askdir-help))
  9.                      )
  10. )
  11.  
  12.  
  13.  
  14. ; Create PDBase directory
  15.  
  16. (makedir (tackon @default-dest "PDBase") (infos))
  17. (set @default-dest (tackon @default-dest "PDBase"))
  18.  
  19. ; Copy PDBase program and doc
  20. (copyfiles  (source "")
  21.             (pattern "~(Install#?|Catalogs)")
  22.             (dest @default-dest)
  23.             (infos)
  24. )
  25.  
  26.  
  27.  
  28. ; Ask for catalogs
  29.  
  30. (copyfiles  (prompt "Which catalogs shall I install")
  31.             (source "Catalogs/")
  32.             (dest (tackon @default-dest "catalogs"))
  33.             (choices "français")
  34.             (confirm)
  35.             (help (cat  "If you run system 2.1 or better,"
  36.                         "you should install your prefered language.\n\n"
  37.                         @copyfiles-help))
  38. )
  39.  
  40.